perm filename S[S1,ALS] blob
sn#408340 filedate 1979-01-04 generic text, type C, neo UTF8
COMMENT ⊗ VALID 00002 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00002 00002 R PASCAL 70↔
C00003 ENDMK
C⊗;
R PASCAL 70↔
SOPS09.REL↔
SOPS09.LST↔
SOPS09.PAS↔
DO S(2)↔
|
LOAD SOPS09.REL↔
SSAVE SOPS09↔
|
DEL SOPS09.LST↔
DEL SOPS09.REL↔
|
RUN PCPE03.DMP[DMP,S1]↔
FFT.PAS↔
FFT.LST↔
FFT.PCO↔
END↔
DO S(5)↔
|
RUN SOPS09.DMP↔
FFT.PCO↔
FFT.PS1↔
FFT.LDI↔
END↔
|
RUN SOPAW6.DMP[DMP,S1]↔
SOPT.PCO↔
SOPT.PS1↔
SOPT.LDI↔
END↔
|
RU FSIM[PAS,S1];PASRUN.LDI[PAS,S1],TEST.LDI,numer1.LDI[PAS,S1]↔